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WELCOME 


I'd like to welcome you to the 
first issue of RNOTES, a semi- 
monthly publication for users 
(and nonusers) of the RPNZL Pro- 
gramming System for the ZX81l and 
~TS1000 computers. In this first 
issue are several articles that 
explain just what RPNZL is and 
just what it can do. 


Although RPNZL has been available 
for less than a year, it has 
become an important addition- to 
the supply of software for the 
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MISSILE GRAPHICS 


THE CORE of any computer graphics 
animation is the problem of simu- 
lating the motion of objects, or 
"missiles". The listings below 
will show how this is done in 
RPNZL. 
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DESIGN PHILOSOPHY 


THE RPNZL Programming System has been 
designed to provide an alternate envi- 
ronment for the ZX81 and TS1000 com- 
puters. This design was carried out 
with four primary goals in mind: 


1) to increase the speed of program 
execution; 


.2) to reduce program and data memory 
requirements; 


3) to give the programmer greater 
access to the hardware; and 


4) to be compact enough to allow 
implementation of a full system 
within a 16K RAM environment. R 


TE E 
RPNZL QUARTET 


RPNZL (Reverse Polish Notation 
Zx8l Language) is a fast machine 
code program that interprets 
RPNZL codes, or tokens, mucha as 
the ROM in the TS1000/ZX81 inter- 
prets BASIC tokens. There are 
many differences in how this is 
done, but mainly RPNZL is faster, 
more compact and more versatile. 


Included in the RPNZL System 
Package (see page 5) are four 
essential programs written in 
RPNZL. The first is the Monitor 
and is laoded along with RPNZL 
itself within a BASIC program. 
Its function is to load, save 
and verify data to tape 12 times. 
faster than BASIC; plus, to let 
continued on page 4 
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little machine. With RPNZL operating in 
16K of RAM, the computer Suddenly grows 
in stature, allowing sophisticated pro- 
gramming in the small environment. In 
memories beyond 16K, BASIC's non-struc- 
tured, non-extensible nature rapidly 
becomes a liability, while RPNZL becomes 
even easier to use. If you've ever 
written even a short BASIC program, you 
know how difficult it can be to finda 
bug; in 32K+ the problem becomes insur- 
mountable. 


Of all the programming aids, utilities, 
toolkits, as well as language implement- 
ations, for the TS1000, RPNZL alone has 
completely revised the operating system 
to include high-speed, software-only 
cassette file system, full I/O redirec- 


tion (I/O to/from files, printer,screen), 


built-in graphics commands, and more! 


RNOTES is devoted to bringing you more 
information about all these features, 
so stay with us. R 
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MECHANICS OF RPNZL 


A RPNZL program consists of a series of 
bytes called tokens, each representing a 
program step. Each token is fetched in 
turn and processed, the system variable 
(SYSVAR) Code Pointer (CPT) being used 

to point to the next token, much as the 
Program Counter is used in machine code. 


The tokens are divisible into groups: 
Øğ-7F Operators 
88-Bl Modules 
B2-CB Local variables 
CC-FF Global variables 


As each token is fetched its highest 
bit, bit 7, is tested; if it is zero 
(token < 8%) it falls into the first 
group. The tokens value doubled is 
used as an offset into the token table. 
At the referenced location is the 
address of the machine code routine 
that actually performs the function of 
the token. For example, token 99 
(DUPE) doubled is 12, plus 4124 (the 
base of the token table) is 4136; at 
4136 is the address of the actual DUPE 
routine, 4389. 


Tokens 6C through 7E, plus ØE, 37 and 
3F, are not presently used; their slots 
in the token table simply point to the 
Error 9 (Code Error) routine. 


Tokens with bit 7 a one have that bit 
reset to zero, then the token is doubled 
to form as offset used as follows: 


The module tokens 8% through Bl serve as 
one-byte subroutine calls. The offset 
formed from the token points into the 
module table (itself pointed to by the 
SYSVAR MODTBL). At the referenced 
location is another offset from the base 
of the module table pointing to the 
subroutine called by the module token. 


The variable tokens B2 through CB and CC 
through FF are one-byte variable address 
references. The offset is added to the 
contents of the SYSVARs GLOBVIBL or 
LOCVIBL; the resulting variable address 
is placed on the stack. The local 
variable tokens are designated :A to :Z; 
the global variables are A to Z and AA 
through 22. 


The use of single-byte codes to refer to 
the most used operators, subroutines and 
variables is the key to RPNZL's compact- 
ness. R 
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In Listing 1 the problem is solved as 
economically as possible. Load and Run 
EDCOM(P), execute Kill File (UK), then 
enter Listing 1 in a text file; Compile 
it, then link it with the deBug command, 
and then Run it. The "missile", a capi- 
tal A, should "take off" from the middle 
of the bottom of the screen and stop 
when it reaches the first screen line. 


It moves pretty fast, huh? If you did 
not see it, check the text file for 
errors, then Run it again, and watch 
carefully. Try the same program in 
BASIC sometime. 


Here's how it works, line by line: 


The text file's title line starts with a 
grey square (CHR$ 8, hex 98) to form the 
text file name's length byte. The last 
24 characters of the line is ignored by 
the Compiler, leaving room for the date 
(or whatever). 


The START address is set to 7DØØ and the 
_ dictionary is cleared by FORGET. 


Line 1§ declares a code segment, line 29 
initializes global variable A with the 
starting position of the missile (row 17 
hex, column 19 hex; 23,16 decimal). 


Line 39 sets up a "DO-LOOP" (like 
BASIC's "FOR-NEXT") that counts from ø 
to 178% by 19Ms (all numbers hex). This 
has the effect of stepping the loop's 
index through all the screen row numbers 
in RPNZL's coordinate notation. This 
notation consists of the row expressed 
as the high byte and the column expressed 
as the low byte of a single integer. 
Line 49 takes care of erasing the old 
missile. 

LISTING 2 
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Line 5Ø inverts the loop index so that 
the row numbers will run from 17øø 
through ø by 19M@s. This is done because 
RPNZL will not allow a loop limit to be 
exceeded by the loop index; negative 
step values are thus not permitted. 


Line 6% merges the column with the row 
number, and duplicates it on the stack. 
Line 7% sets the print position to the 
new one, and stores the duplicate in A, 
so that line 49 can find the missile to 
erase it on the next iteration. Line 89 
then prints the new missile. 


Line 19% loops back to line 49% to repeat 
the process for each line. 


Go back to the text file and insert a 
line 9% as follows: 


( 9ğ) 2 DELAY 


ReCompile, deBug, and run. The delay 
provided by line 9%, lasting 2/60ths of 
a second on each row, makes the action 
more visible. 


Enter listing 2 as shown; Compile, deBug 
and Run. The effect is the same, but 
the program seems more readable. This 
is because of the 2 constants, ORIGIN 
and COLUMN , and the global varaible A, 
renamed OLD.POSITION. 


ORIGIN is the missile's line of origin, 
and COLUMN is the screen colum in 
which the missile will travel. 


Lines 79 and 8% of Listing 2 accomplish 
the same thing as line 29 of Listing 1, 


The remaining lines of Listing 2 dupli- 
cate the DO-LOOP of Listing 1; the 
DEF ined words simply function as stand- 
ins for the desired values. 


Listing 3 shows how this problem would 
be coded modularly. If you examine the 
final (program) SEGment, you will see 
that is even more readable. 


All the elements of the original program 
are still there, except they are now 
represented symbolically. 


INITIALIZE-- This sets up the global 
variable OLD.POSITION just as line 29 
of Listing 1 does; plus, the shape of 
the missile (and the unmissile) are 
stored as strings, and variables are 


- initialized with their addresses, so 


that $PRINT can be used in MAKE.MIS- 
SILE and ERASE.MISL. 
continued on page 4 





(Missile Graphics, cont. from page 3) 
LISTING 3 
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QUANTITY PRICES 


The RPNZL System Package, as described on 
page 5, is regularly $29.95. For quan- 
tities of 10 to 24, there is a 25% dis- 
count; for 25 or more the discount is 
50%. We pay shipping on orders of 5 or 
more. 

THE GOLDEN STAIR 

141A Dore Street 

San Francisco, CA 94103 
(415) 552-1415 


The DO-LOOP is set up using TOP 
(referring to the top line) and ORIGIN 
(referring to the bottom line). Within 
the loop ERASE.MISL is used; this 
gets the OLD.POSITION and prints the 
"UNMISSILE" there. 


NEW.POSITION-- This procedure inverts 
the line number value of the loop index. 


MAKE .MISSILE-- Here, the "MISSILE" 
is printed at the position stored in the 
variable NEW.POSITION. 


SLOW.DOWN-- This has been included to 
show how a constant (as in this case), a 
variable, or a procedure returning a 
value can be used to slow down the loop 
in order to make the missile more 
visible. 


As can be seen, the modular style makes 
the most readable code. Using the pro- 
gram SEGnent as given in Listing 3, 
completely new subroutines to draw, 
erase and recalculate the missile can be 
designed and implemented. R 
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you examine, change, and print data in 
your computer's memory. The Monitor 
also supervises the running of other 
RPNZL programs. 


The next two programs come together in 
one file on tape; they are the Editor 
and Compiler (EDCOM). The Editor 
allows you to type into the computer 
just like a typewriter, except a "text 
file" is used instead of paper. The 
Editor also lets you load, save, verify 
and print these text files. 


The Compiler takes a text file prepared 
with the Editor and translates it into 
RPNZL codes, or tokens, and stores the 
code in "link files". 

Later, a number of link files are all 
played back to the fourth program, 
called the Linker, which (appropriately) 
links the code together into a program. 
Even if you're not a programmer, with 
the RPNZL System you can run any RPNZL 


programs others have written, and still 
take advantage of the added speed and 


power. R 
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RPNZL IN LARGER MEMORY ENVIRONMENTS 


ALTHOUGH designed to be usable in a 16K system, 
RPNZL shows its real capabilities in environ- 
ments beyond 16K. Due to hardware limitations, 
it is not possible to run machine code in the 
upper half of memory (8@@9-FFFF), nor may the 
display file straddle the 89@@ address mark. 
However, RPNZL, as long as no machine code is 
included, works without hindrance. 


Figure 1 shows how RPNZL's work area is appor- 
tioned by the standard Editor/Compiler (EDCOM). 
Figure 2 diagrams an additional 16K. 


When EDCOM is installed, a table containing the 
mapping data is copied into the external 
variables USR] through USR12 at 4@D8, where the 
Editor, Compiler and Linker can access it. This 
table is located at 745D and is 18 hex bytes 
long. After installation, the area is over- 
written by the text file. Figure 3 shows the 
values and names of the twelve variables for the 
standard map of Figure l and for the expanded 
version of Figure 2. 


Load EDCOM(P) at 65@@ and then use the W(rite 
Mem) Monitor command to enter the new mapping 
data into the table at 745D. RAMIOP should be 
at 899%. The area 72EQ-7CFF is available for 
utility routines (string search, etc.) or 
whatever. 


With the text file expanded to 13K from 2K, and 
the link file to 3K from }K, program development 
is greatly simplified. R 


RPNZL 


Reverse Polish Notation Zx81 
Language is a FORTH-like language 
providing 15 times the execution 
speed of Sinclair BASIC in half 
the program space! 


j RPNZL GOES BEYOND FORTH-- 
@3000 bps cassette system 
eStructured, modular code with IF, 
DO, BEGIN, WHILE, SELECT/CASE 
eFull TS2040 printer support . J 
eFull-screen editor with flashing cursor 
eBuilt-in SHAPE and FIGure commands 
eMore features eMore features 


Te- es 
System Package 


The RPNZL Programming 
includes: his 
e@Language Tape with Resident .° 

Monitor Program san 
eEditor/Compiler @70-page Manual - 
eProgram Sampler — eLinker 
The RPNZL System ee at 
least 16K RAM 29.95 ` 
(Add 64% sales tax + $2.00 - THE GOLDEN STAIR 

141A Dore Street x 

Ca fl San Francisco, CA 94103 E 


(415) 552-1415 





6499 EDCOM (6599-72DF) 
7909 Text File (72EQ-7AFF) 
Link File (7B@Q-7CFF) 
8900 Dictionary (7DØØ-7FØØ) 
Machine Stack (7FQ@-7FFF) 
FIGURE 1 
7490 Free (72EQ-7CFF) 
800e Dictionary (7DØØ-7FøØğ) 
chine Stack (7FQQ-7FFF) 
IØ 
i -B3FF 
ADB Text File (8ØØøØ-B3FF) 
BØØØ 
Link File (B4Q%-BFFF) 
CHAA 
FIGURE 2 
Standard Expanded 
745D: MAXLIST ØøØ26 Ø17A 
SF: 
6l: TEXT FILE 72g 8900 
63: MAIN DFILE 
65: 
67: NAME 72E1 8801 
69: LINES ØØ3E Ø192 
6B: LINK FILE 7BØØ Bagg 
6D: DICT 
6F: LPSTK 
7l: LINK LEN Q1FF QBFF 
73: TEXT LEN gglg 3499 
FIGURE 3 


PRINTER PRIMER 


--PRINTED TAPE DIRECTORIES-- 
--PRINTED MEMORY DUMP-- 


From the Monitor, use the W(rite Mem) 
command to place the value 93 at address 
497C (OUTSTAT). This enables the 
printer. Use the F(ile Directory) or 
D(ump) commands in the normal fashion— 
each line is echoed to the printer! 
W(rite Mem) ØØ into address 497C to 
disable the printer again. 


Within a program, the printer may be 


turned on by Øl OPEN and off again by 
Øl CLOSE .R 
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Circle and Draw 
RPNZL's Built-in Text 
Editor 

Compiler Enhancements 


Des Plaines, IL 60017 





STAND-ALONE 

DEMONSTRATION TAPES 
These two programs are writ- 
ten in an eartier version of 
RPNZL to demonstrate some 
of its potential. They DO NOT 
REQUIRE the System Package 
—just load them and go—they 
are self-starting. 


THE GOLDEN STAIR 

141A Dore Street 

San Francisco, CA 94103 
(415) 552-1415 


CA residents add sales tax. 
Add $1.00 shipping. 
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RNOTES Is a Semi-Monthly 
Journal for Users of the 
RPNZL Programming System for the 
TS1000 and ZX-81 Computers 


#1—THE DESPERATE herd roams 
a hot, torrid plain, grazing on the 
patchy brush, always seeking 
more until they find it or starve... 
reproducing if only they can eat 
enough. The rains come bringing 
thick vegetation, but the herd’s 
gluttony leads to a population 
explosion—then famine, and they 
starve in droves. You control me- 
tabolism and energy requirements 
of the beasts and growth and food 
value of the vegetation. 


Beast in the Field 
TS1000(16K)/TS 1500 14.95 


#2—METEOR STORM's fast 
arcade-style animation brings ex- 
citing graphics to the Timex 
screen. Challenge yourself to com- 
mand your craft through a storm 
of interstellar debris—your skills 
as pilot and gunner will be stret- 
ched to their limits. 

Meteor Storm 

TS1000(16K)/TS 1500 7.95 





Timex, Timex-Sinclair, TS1000 and TS1500 are 
registered trademarks of the Timex Computer 
Corporation. Sinclair and ZX81 are registered 
trademarks of Sinclair Research Ltd. RPNZL is 
a trademark of The Golden Stair. 
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